The Complete Work of Mahatma Gandhi/The Complete Work of Mahatma Gandhi-CD interactive.iso/pc/ganmac/eb.cst/00283_Script_vodvol0

Text File | 1999-05-31 | 2KB | 58 lines

on mouseDown
  --  for 0 Volume
  global gvolume, cspname, gwhere
  set gwhere to the movieTime of sprite 6
  set wgrp to chars(cspname,1,1)
  if gvolume > 0 then
    if gvolume = 150 then
      set the member of sprite 107 to the number of member (wgrp&"volm")
    else
      set the member of sprite 108 to the number of member (wgrp&"voll")
    end if
  end if

  set the member of sprite 106 to the number of member("r"&wgrp&"vol0")
  set the soundLevel to 0
  set the volume of sound 1 to 0
  set the volume of sound 2 to 0
  set the volume of sound 6 to 0
  set gvolume to 0
  updateStage

  --  updateStage

end

on mouseUp
  global gxx, vlocH, vlocV
  set ii to the name of member (the memberNum of sprite gxx) of castLib "eb.cst"
  set mm to chars(ii,2,6)
  set the memberNum of sprite gxx to the number of member mm

  set the visible of sprite 5 to true
  set the visible of sprite 98 to true
  set the visible of sprite 101 to true
  set the visible of sprite 102 to true
  set wm to the name of member (the memberNum of sprite 101) of castLib "eb.cst"
  global pv
  if wm = "play" then
    set pv to 2
    go to frame "video"
  else
    set pv to 1
    go to frame "video"
    --        set xx to the movieTime of sprite 6
    --        set the movieTime of sprite 6 to -1
    --        updateStage
    --        set the movieTime of sprite 6 to xx
    --        set the movierate of sprite 6 to 1
  end if
  set the locH of sprite 98 to vlocH
  set the locV of sprite 98 to vlocV
  set the visible of sprite 106 to false
  set the visible of sprite 107 to false
  set the visible of sprite 108 to false
  CHASPCURSOR -1,106,108
  updateStage
end